home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload Trio 2 / Shareware Overload Trio Volume 2 (Chestnut CD-ROM).ISO / dir44 / dungeon9.zip / ANSI.BAS next >
BASIC Source File  |  1994-05-15  |  7KB  |  472 lines
  1.  REM ansi.bas v1.0 for dungeon screen
  2.  CLS
  3.  COLOR 12
  4.  PRINT SPACE$(4);
  5.  COLOR 7
  6.  PRINT "·";
  7.  COLOR 8
  8.  PRINT "░"; SPACE$(15);
  9.  COLOR 7
  10.  PRINT "·"; SPACE$(25);
  11.  COLOR 8
  12.  PRINT "░  ░     ";
  13.  COLOR 7
  14.  PRINT "∙"; SPACE$(6); "·   ∙     ";
  15.  COLOR 8
  16.  PRINT "░";
  17.  COLOR 7
  18.  PRINT "∙"
  19.  PRINT SPACE$(6);
  20.  COLOR 8
  21.  PRINT "░";
  22.  COLOR 7
  23.  PRINT "∙"; SPACE$(10);
  24.  COLOR 8
  25.  PRINT "░ ░"; SPACE$(8);
  26.  COLOR 7
  27.  PRINT "∙  ·    ";
  28.  COLOR 15
  29.  PRINT "▄▓▓██▄   ";
  30.  COLOR 7
  31.  PRINT "∙ ";
  32.  COLOR 8
  33.  PRINT "░░"; SPACE$(15);
  34.  COLOR 15
  35.  PRINT "Welcome To";
  36.  COLOR 8
  37.  PRINT "░ ";
  38.  COLOR 7
  39.  PRINT "∙"
  40.  PRINT "    ";
  41.  COLOR 8
  42.  PRINT "░∙░▒░ ";
  43.  COLOR 7
  44.  PRINT "∙"; SPACE$(9);
  45.  COLOR 8
  46.  PRINT "▒· ░"; SPACE$(12);
  47.  COLOR 15
  48.  PRINT "▐███▓█▓▌   ";
  49.  COLOR 8
  50.  PRINT "░ ▒▓░"; SPACE$(7);
  51.  COLOR 15
  52.  PRINT "·  The Dungeon v9.0 "
  53.  PRINT SPACE$(5);
  54.  COLOR 8
  55.  PRINT "░░▒▓░"; SPACE$(9);
  56.  COLOR 7
  57.  PRINT "·  ";
  58.  COLOR 8
  59.  PRINT "▒  ░";
  60.  COLOR 7
  61.  PRINT ". ";
  62.  COLOR 15
  63.  PRINT "· ";
  64.  COLOR 8
  65.  PRINT "░ ·    ";
  66.  COLOR 15
  67.  PRINT "▀▓█▓█▀"; SPACE$(6);
  68.  COLOR 8
  69.  PRINT "░ ▓▒   ";
  70.  COLOR 7
  71.  PRINT "∙"; SPACE$(6);
  72.  COLOR 15
  73.  PRINT ".   ·   ";
  74.  COLOR 7
  75.  PRINT "∙  ·"
  76.  PRINT "  ";
  77.  COLOR 15
  78.  PRINT ".   ·   ";
  79.  COLOR 7
  80.  PRINT "∙  ·"; SPACE$(6); "∙ ";
  81.  COLOR 8
  82.  PRINT "▒▓▓  ";
  83.  COLOR 7
  84.  PRINT "· . ";
  85.  COLOR 8
  86.  PRINT "░▒"; SPACE$(17);
  87.  COLOR 7
  88.  PRINT "· ";
  89.  COLOR 8
  90.  PRINT "▒▓"; SPACE$(8);
  91.  COLOR 15
  92.  PRINT "An Adventure Game"; SPACE$(4);
  93.  COLOR 10
  94.  PRINT "▄▄▄▄ ";
  95.  COLOR 8
  96.  PRINT "░▒░  ∙"; SPACE$(8); "░▒▓▒";
  97.  COLOR 7
  98.  PRINT "·    ";
  99.  COLOR 8
  100.  PRINT "▒ ▒  ";
  101.  COLOR 7
  102.  PRINT "·   ∙   ";
  103.  COLOR 8
  104.  PRINT "·    ░  ░    ░";
  105.  COLOR 7
  106.  PRINT "∙"; SPACE$(3);
  107.  COLOR 15
  108.  PRINT " By The Author"
  109.  PRINT SPACE$(3);
  110.  COLOR 10
  111.  PRINT "▄█";
  112.  COLOR 2
  113.  PRINT "▓";
  114.  COLOR 10
  115.  PRINT "████  ";
  116.  COLOR 8
  117.  PRINT "░"; SPACE$(6);
  118.  COLOR 7
  119.  PRINT "·     ";
  120.  COLOR 8
  121.  PRINT "░▒▓    ░ ▓"; SPACE$(13);
  122.  COLOR 7
  123.  PRINT "·"; SPACE$(8);
  124.  COLOR 8
  125.  PRINT "∙░▒░ ";
  126.  COLOR 15
  127.  PRINT "∙"; "   Of Dnddoor "
  128.  COLOR 7
  129.  PRINT "  ";
  130.  COLOR 10
  131.  PRINT "█";
  132.  COLOR 2
  133.  PRINT "▓";
  134.  COLOR 10
  135.  PRINT "██";
  136.  COLOR 2
  137.  PRINT "▓▓▓▓";
  138.  COLOR 10
  139.  PRINT "█";
  140.  COLOR 15
  141.  PRINT "    ·"; SPACE$(11);
  142.  COLOR 8
  143.  PRINT "▒  ";
  144.  COLOR 7
  145.  PRINT "∙  ";
  146.  COLOR 8
  147.  PRINT "░ ▓∙ ";
  148.  COLOR 7
  149.  PRINT ". ";
  150.  COLOR 15
  151.  PRINT "·   ";
  152.  COLOR 6
  153.  PRINT " ║";
  154.  COLOR 4
  155.  PRINT "██▄  ";
  156.  COLOR 7
  157.  PRINT "▄";
  158.  COLOR 6
  159.  PRINT "║";
  160.  COLOR 4
  161.  PRINT "██▄"; SPACE$(9);
  162.  COLOR 7
  163.  PRINT SPACE$(11)
  164.  PRINT " ";
  165.  COLOR 2
  166.  PRINT "██████████"; SPACE$(10);
  167.  COLOR 7
  168.  PRINT "∙"; SPACE$(7);
  169.  COLOR 8
  170.  PRINT "▒    ░░▒▒"; SPACE$(6);
  171.  COLOR 7
  172.  PRINT "▄";
  173.  COLOR 6
  174.  PRINT "║";
  175.  COLOR 7
  176.  PRINT "█▌  ██";
  177.  COLOR 6
  178.  PRINT "║"; SPACE$(7); "║";
  179.  COLOR 4
  180.  PRINT "█▄  ";
  181.  COLOR 8
  182.  PRINT "░";
  183.  COLOR 7
  184.  PRINT "∙"
  185.  COLOR 10
  186.  PRINT "█████████████"; SPACE$(17);
  187.  COLOR 8
  188.  PRINT "░▒";
  189.  COLOR 7
  190.  PRINT "∙    ";
  191.  COLOR 8
  192.  PRINT "░   ";
  193.  COLOR 7
  194.  PRINT "▄▄█▓";
  195.  COLOR 6
  196.  PRINT "║";
  197.  COLOR 7
  198.  PRINT "▓█ ▐▓█▓▄    ▄█";
  199.  COLOR 6
  200.  PRINT "║   ";
  201.  COLOR 8
  202.  PRINT "∙░▒░ ";
  203.  COLOR 7
  204.  PRINT "∙";
  205.  COLOR 8
  206.  PRINT "∙ ░ ░";
  207.  COLOR 7
  208.  PRINT ". ";
  209.  COLOR 15
  210.  PRINT "·"
  211.  COLOR 2
  212.  PRINT "██▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓"; SPACE$(14);
  213.  COLOR 8
  214.  PRINT "░     ░";
  215.  COLOR 6
  216.  PRINT "\";
  217.  COLOR 7
  218.  PRINT "▀██▓██";
  219.  COLOR 6
  220.  PRINT "║";
  221.  COLOR 7
  222.  PRINT "█▓▌█▓██▓█  █▓█";
  223.  COLOR 6
  224.  PRINT "║";
  225.  COLOR 7
  226.  PRINT "█   ";
  227.  COLOR 15
  228.  PRINT "·"; SPACE$(7);
  229.  COLOR 8
  230.  PRINT "▓  ";
  231.  COLOR 7
  232.  PRINT "· ."
  233.  COLOR 10
  234.  PRINT "▓▓▓▓▓▓▓▒▒▓▒▓▒▓▒▒▓▓▒"; SPACE$(8);
  235.  COLOR 7
  236.  PRINT "∙     ";
  237.  COLOR 8
  238.  PRINT "∙     ";
  239.  COLOR 6
  240.  PRINT "\\";
  241.  COLOR 7
  242.  PRINT "██▓█";
  243.  COLOR 6
  244.  PRINT "║";
  245.  COLOR 7
  246.  PRINT "▀ ";
  247.  COLOR 7
  248.  PRINT "\▐█▓██▓█  ██";
  249.  COLOR 6
  250.  PRINT "║";
  251.  COLOR 7
  252.  PRINT "█▓   ";
  253.  COLOR 15
  254.  PRINT "·   ";
  255.  COLOR 7
  256.  PRINT ".    ";
  257.  COLOR 8
  258.  PRINT "░ ▒"
  259.  COLOR 2
  260.  PRINT "▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒░░░"; SPACE$(13);
  261.  COLOR 7
  262.  PRINT "·   ";
  263.  COLOR 6
  264.  PRINT "\\";
  265.  COLOR 7
  266.  PRINT "█▀ ";
  267.  COLOR 6
  268.  PRINT "║";
  269.  COLOR 7
  270.  PRINT "\  \▀██▓███/ ▀";
  271.  COLOR 6
  272.  PRINT "║";
  273.  COLOR 7
  274.  PRINT "▓██▄"; SPACE$(9); "∙   ";
  275.  COLOR 8
  276.  PRINT "░"
  277.  COLOR 2
  278.  PRINT "▒▒░▒░▒░░░░░░░░░░░░░░░░";
  279.  COLOR 2
  280.  PRINT "███";
  281.  COLOR 14
  282.  PRINT "████"; SPACE$(8);
  283.  COLOR 7
  284.  PRINT "·   ";
  285.  COLOR 6
  286.  PRINT "\";
  287.  COLOR 4
  288.  PRINT "▒▒▒▒";
  289.  COLOR 6
  290.  PRINT "_";
  291.  COLOR 7
  292.  PRINT "\";
  293.  COLOR 6
  294.  PRINT "__";
  295.  COLOR 7
  296.  PRINT "\";
  297.  COLOR 6
  298.  PRINT "_║";
  299.  COLOR 7
  300.  PRINT "▀▀▀/";
  301.  COLOR 6
  302.  PRINT "_";
  303.  COLOR 4
  304.  PRINT "▒";
  305.  COLOR 6
  306.  PRINT "■";
  307.  COLOR 4
  308.  PRINT "▒";
  309.  COLOR 6
  310.  PRINT "■";
  311.  COLOR 4
  312.  PRINT "▒▓";
  313.  COLOR 6, 4
  314.  PRINT "/";
  315.  COLOR 15, 0
  316.  PRINT SPACE$(5); "."
  317.  COLOR 2
  318.  PRINT "░░░░░░";
  319.  COLOR 2
  320.  PRINT "█";
  321.  COLOR 10
  322.  PRINT "░";
  323.  COLOR 2
  324.  PRINT "█";
  325.  COLOR 10
  326.  PRINT "░░░";
  327.  COLOR 2
  328.  PRINT "█";
  329.  COLOR 10
  330.  PRINT "░";
  331.  COLOR 2
  332.  PRINT "█";
  333.  COLOR 10
  334.  PRINT "░";
  335.  COLOR 2
  336.  PRINT "████████";
  337.  COLOR 14
  338.  PRINT "███████";
  339.  COLOR 1
  340.  PRINT "████████";
  341.  COLOR 15, 1
  342.  PRINT "▓▒";
  343.  COLOR 1, 0
  344.  PRINT "█";
  345.  COLOR 4
  346.  PRINT "▒▒▒";
  347.  COLOR 6
  348.  PRINT "■";
  349.  COLOR 4
  350.  PRINT "▒";
  351.  COLOR 6
  352.  PRINT "■";
  353.  COLOR 4
  354.  PRINT "▒";
  355.  COLOR 6
  356.  PRINT "■";
  357.  COLOR 4
  358.  PRINT "▒";
  359.  COLOR 6
  360.  PRINT "■";
  361.  COLOR 4
  362.  PRINT "▒";
  363.  COLOR 6
  364.  PRINT "■";
  365.  COLOR 4
  366.  PRINT "▒";
  367.  COLOR 6
  368.  PRINT "■";
  369.  COLOR 4
  370.  PRINT "▒";
  371.  COLOR 6
  372.  PRINT "■";
  373.  COLOR 4
  374.  PRINT "▒▒▒▒▓";
  375.  COLOR 6, 4
  376.  PRINT "/";
  377.  COLOR 1, 0
  378.  PRINT "████████████████";
  379.  COLOR 2
  380.  PRINT "█████████████████████";
  381.  COLOR 14
  382.  PRINT "██▓██";
  383.  COLOR 1
  384.  PRINT "▒▒▓▓▓▓▓▓▓▓▓▓";
  385.  COLOR 15, 1
  386.  PRINT "▓▒░";
  387.  COLOR 1, 0
  388.  PRINT "▓▓";
  389.  COLOR 4
  390.  PRINT "▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▓";
  391.  COLOR 6, 4
  392.  PRINT "/";
  393.  COLOR 1, 0
  394.  PRINT "▓▓▓▓▓▓▓▓▓▓▒▓▒▓▒▒▓";
  395.  COLOR 2
  396.  PRINT "████▓███▓█▓██████";
  397.  COLOR 14
  398.  PRINT "████▓▓█";
  399.  COLOR 1
  400.  PRINT "▒▒▒▒▒▒▒▓▒▓▒▓▒▓";
  401.  COLOR 15, 1
  402.  PRINT "▒▓░▒";
  403.  COLOR 1, 0
  404.  PRINT "▒▒▒";
  405.  COLOR 4
  406.  PRINT "▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓";
  407.  COLOR 6, 4
  408.  PRINT "/";
  409.  COLOR 1, 0
  410.  PRINT "▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒";
  411.  COLOR 2
  412.  PRINT "██▓▓▓▓▓▓▓▓▓▓▓";
  413.  COLOR 14
  414.  PRINT "▓▓▓▓█▓█▓▓▓▓▓▓▒";
  415.  COLOR 1
  416.  PRINT "░░░▒▒▒▒▒▒▒";
  417.  COLOR , 7
  418.  PRINT "▓▒▓░";
  419.  COLOR 15, 1
  420.  PRINT "▓";
  421.  COLOR 1, 0
  422.  PRINT "▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒░░░░";
  423.  COLOR 14
  424.  PRINT "▓▓▓▓▓▓▓▓▓▓▓";
  425.  COLOR 2
  426.  PRINT "▓▓▓▒▓▒▓▒▒▓▒▓░▓";
  427.  COLOR 14
  428.  PRINT "▒▓";
  429.  PRINT "▓▒▒▓▒▓▒▓▒▓▓▒▒";
  430.  COLOR 1
  431.  PRINT "░░░░░▒░░";
  432.  COLOR 15, 1
  433.  PRINT "░";
  434.  COLOR 1, 7
  435.  PRINT "▒▓▒▓";
  436.  COLOR 15, 1
  437.  PRINT "░";
  438.  COLOR 1, 0
  439.  PRINT "░░░▒░▒░▒░░▒▒░▒░░░░░";
  440.  COLOR 14
  441.  PRINT "▓▒▓▓▓▓▓▓▒▓▒▓▓▒▒▓▒▓";
  442.  COLOR 2
  443.  PRINT "▒▓▒▒▒▒▒▒▒▒▒░";
  444.  COLOR 14
  445.  PRINT "▒▒▒▒▒▒▒▒▓▒▒▓▒▓▒▓▒▓▒▒";
  446.  COLOR 1
  447.  PRINT "░░░░";
  448.  COLOR 15, 1
  449.  PRINT "░";
  450.  COLOR 1, 7
  451.  PRINT "▓▓▒▓";
  452.  COLOR 15, 1
  453.  PRINT "░▒";
  454.  COLOR 1, 0
  455.  PRINT "░░░░░░░░░░░░░";
  456.  COLOR 14
  457.  PRINT "▒▒";
  458.  PRINT "▒▓▒▓▒▒▓▒▓▒▓▓▒▒▒▒▒▓▒▒▒▒";
  459.  COLOR 2
  460.  PRINT "▒▒▒░▒░▒░▒░░░░░";
  461.  COLOR 14
  462.  PRINT "▒▒░▒▒▒▒▒▒▒▒▒▒▒▒▓▒▒▓▒▓▒▒▒▒▓▒▓▒▒▓▒▓▒▓▒▒▓▓▓▒▓▒▒▒▒▒▒▓▒▒▒▒▒▒▒▒▒▒▒░▒▒░░▒";
  463.  COLOR 2
  464.  PRINT "▒░▒░▒░░░░░";
  465.  COLOR 14
  466.  PRINT "░▒░░░░▒░▒▒░▒▒▒▒░▒░▒░▒▒▒▒▒▒▒░▒░▒░▒▒░▒▒▒▒▒▒▒▒▒▒░▒░░▒▒▒▒▒░▒▒░▒░▒▒░░░░░░░░"
  467.  COLOR 7, 1
  468.  PRINT SPACE$(80)
  469.  PRINT SPACE$(80);
  470.  COLOR 7, 0
  471.  END
  472.